(when (>= (javaVersion T) (1 7) )
  (de composeMethodHandle @
    (let MethodHandle (next)
      (while (args)
        (setq MethodHandle
          (java "java.lang.invoke.MethodHandles"
            "filterReturnValue" MethodHandle (next) ) ) )
      MethodHandle) ) )